SUBROUTINE VARZEROInt
    ! ***
    ! *** THIS SUBROUTINE ZERO'S ALL OF THE ARRAYS AFTER ALLOCATION
    ! ***

    USE GLOBAL
    !

    ! *** INTEGER ARRAYS
    !
    ISADAC=0
    ISADAH=0
    ISADAV=0
    ISCDA=0
    ISCDCA=0
    ISCI=0
    ISCO=0
    ISFCT=0
    ISHPLTV=0
    ISPHXY=0
    ISPLIT=0
    ISRSPH=0
    ISRSPV=0
    ISSPH=0
    ISSPV=0
    ISTOPT=0
    ISTRAN=0
    ISTRWQ=0
    JSRSPH=0
    JSRSPV=0
    JSSPH=0
    JSSPV=0
    LWQTS=0
    NCSPH=0
    NCSPV=0
    NIJSPV=0
    NIJVPV=0
    NPSPH=0
    NPSPV=0
    NWQCSR=0
    !
    IACTLR=0
    IAIJ=0
    IAKL=0
    IAP=0
    IBENMAP=0
    IBLTAUC=0
    ICALJP=0
    ICBE=0
    ICBN=0
    ICBS=0
    ICBW=0
    ICDA=0
    ICFLMP=0
    ICPSL=0
    ICSMTS=0
    ICWQTS=0
    IDRICM=0
    IJCT=0
    IJCTLT=0
    IL=0
    ILLSHA=0
    ILLT=0
    ILRPD=0
    ILTMSR=0
    IMASKDRY=0
    IMDCHH=0
    IMDCHU=0
    IMDCHV=0
    IMWQZT=0
    IMWQZT1=0
    IMWQZT2=0
    INPNS=0
    IOUTJP=0
    IPBE=0
    IPBN=0
    IPBS=0
    IPBW=0
    IQCAX=0
    IQCTLD=0
    IQCTLU=0
    IQJP=0
    IQS=0
    IQWRD=0
    IQWRU=0
    IRELH=0
    IROUSE=0
    ISBDLD=0
    ISCDRY=0
    ISDBLDIR=0
    ISDIFBW=0
    ISDJP=0
    ISEDBU=0
    ISEDSCOR=0
    ISEDWU=0
    ISENT=0
    ISLTAUC=0
    !      ISLUSED=0
    ISMHYPD=0
    ISMT=0
    ISMZMAP=0
    ISNDBU=0
    ISNDEQ=0
    ISNDM1=0
    ISNDM2=0
    ISNDWU=0
    ISPBE=0
    ISPBN=0
    ISPBS=0
    ISPBW=0
    ISPNS=0
    ISPV=0
    !ISRED=0     ! PMC - NOT USED
    ISS3DSED=0
    ISS3DSND=0
    ISS3DTOX=0
    ISTJP=0
    ISTOC=0
    ISTOXR=0
    ISUDPC=0
    ISWDINT=0
    ITOXBU=0
    ITOXWU=0
    ITXBDUT=0
    ITXINT=0
    ITXPARB=0
    ITXPARBC=0
    ITXPARW=0
    ITXPARWC=0
    IUBE=0
    IUBW=0
    IUPCJP=0
    IVBN=0
    IVBS=0
    IVPV=0
    IVSFP=0
    IWGG=0
    IWQCBE=0
    IWQCBN=0
    IWQCBS=0
    IWQCBW=0
    IWQKA=0
    IWQOBE=0;IWQOBE=0
    IWQOBN=0;IWQOBN=0
    IWQOBS=0;IWQOBS=0
    IWQOBW=0;IWQOBW=0
    IWQPSC=0
    IWQPSV=0
    IWQT=0
    IWQZMAP=0
    IWRSP=0
    IWRSPB=0
    JCBE=0
    JCBN=0
    JCBS=0
    JCBW=0
    JCDA=0
    JCPSL=0
    JL=0
    JLLSHA=0
    JLLT=0
    JLRPD=0
    JLTMSR=0
    JMDCHH=0
    JMDCHU=0
    JMDCHV=0
    JNPNS=0
    JPBE=0
    JPBN=0
    JPBS=0
    JPBW=0
    JQCAX=0
    JQCTLD=0
    JQCTLU=0
    JQJP=0
    JQS=0
    JQWRD=0
    JQWRU=0
    JSPNS=0
    JSPV=0
    JSS3DSED=0
    JSS3DSND=0
    JSS3DTOX=0
    JUBE=0
    JUBW=0
    JUNTPX=0
    JUNTPY=0
    JUPCJP=0
    JVBN=0
    JVBS=0
    JVPV=0
    JVSFP=0
    JWGG=0
    JWQCBE=0
    JWQCBN=0
    JWQCBS=0
    JWQCBW=0
    KBT=0
    KCEFDC=0
    KCPSL=0
    KEFFJP=0
    KFEFDC=0
    KPB=0
    KPS=0
    KQJP=0
    KQWRD=0
    KQWRU=0
    KUPCJP=0
    KUPW=1
    KWBU=0
    KWBV=0
    KWU=0
    KWV=0
    KWW=0
    !LBC=0     ! PMC - NOT USED
    LBERC=0
    LBNRC=0
    LBSRC=0
    LBWRC=0
    LCBE=0
    LCBN=0
    LCBS=0
    LCBW=0
    LCDA=0
    LCEFDC=0
    LCHNC=0
    LCONSOL=0
    LCT=0
    LCTLT=0
    LFEFDC=0
    LIJ=0
    LIJLT=0
    LJUNX=0
    LJUNY=0
    LLBC=0
    LLRC=0
    LLSHA=0
    LMDCHH=0
    LMDCHU=0
    LMDCHV=0
    LNC=0
    LNCLT=0
    LNEC=0
    LNWC=0
    LOBCS=0
    LBCS=0
    LORDER=0
    LPBE=0
    LPBN=0
    LPBS=0
    LPBW=0
    LQCTLD=0
    LQCTLU=0
    LQS=0
    LQWRD=0
    LQWRU=0
    !LRC=0      ! PMC - NOT USED
    !LREBC=0    ! PMC - NOT USED
    !LRNBC=0    ! PMC - NOT USED
    !LRSBC=0    ! PMC - NOT USED
    !LRWBC=0    ! PMC - NOT USED
    LSBLBCD=0
    LSBLBCU=0
    LSC=0
    LSCLT=0
    LSEC=0
    LSHAB=0
    LSHAP=0
    LSHAU=0
    LSHAUE=0
    LSMTS=0
    LSWC=0
    LUBE=0
    LUBW=0
    LUPU=0
    LUPV=0
    LUU=0
    LUV=0
    LUW=0
    LUWV=0
    LUWW=0
    LVBN=0
    LVBS=0
    LVSU=0
    LVSW=0
    !LVU=0    ! PMC - NOT USED
    !LVV=0    ! PMC - NOT USED
    !LVW=0    ! PMC - NOT USED
    LWGG=0
    MASER=0
    MATLAST=0
    MCNTLR=0
    MCSER=0
    MCTLAST=0
    MDCHTYP=0
    MGWSER=0
    MGWTLAST=0
    MPSER=0
    MPTLAST=0
    MQCTL=0
    MQSER=0
    MQTLAST=0
    MQWRSR=0
    MQWRTLST=0
    MSVSED=0
    MSVSND=0
    MSVTOX=0
    MTMSRA=0
    MTMSRC=0
    MTMSRP=0
    MTMSRQ=0
    MTMSRQE=0
    MTMSRU=0
    MTMSRUE=0
    MTMSRUT=0
    MTSCUR=0
    MTSSTSP=0
    MVEGL=0
    MVEGSER=0
    MVEGTLAST=0
    MVPSL=0
    !MWQCSR=0
    MWQCTLT=0
    MWQPSR=0
    MWQPTLT=0
    MWSER=0
    MWTLAST=0
    NATDRY=0
    NCHNC=0
    NCSER=0
    NCSERA=0
    NCSERE=0
    NCSERJP=0
    NCSERN=0
    NCSERQ=0
    NCSERS=0
    NCSERW=0
    NDWHT=0
    NGWSL=0
    NJEL=0
    NJPMX=0
    NLOE=0
    NLON=0
    NLOS=0
    NLOW=0
    NLRPDL=0
    NLRPDRT=0
    NPORTJP=0
    NPSERE=0
    NPSERN=0
    NPSERS=0
    NPSERW=0
    NQCMFD=0
    NQCMFU=0
    NQCMUL=0
    NQCTLQ=0
    NQCTYP=0
    NQSERJP=0
    NQSERQ=0
    NQSMF=0
    NQSMUL=0
    NQWRMFD=0
    NQWRMFU=0
    NQWRSERJP=0
    NQWRSERQ=0
    NSP2=0
    NTSCRE=0
    NTSCRN=0
    NTSCRS=0
    NTSCRW=0
    NTSSSS=0
    NTVSFP=0
    NUDJP=0
    NUDJPC=0
    NUMTMP=0
    NUTMP=0
    NVEGSERV=0
    !NWQLOE=0  ! PMC - NOT USED
    !NWQLON=0  ! PMC - NOT USED
    !NWQLOS=0  ! PMC - NOT USED
    !NWQLOW=0  ! PMC - NOT USED
    NXYSDAT=0
    NZPRJP=0
    SLLN=3
    !ENSIGHT VARIABLES ZEROS
    VARUNCOUNT=0
    ENSIGHT1=0
    ENSIGHT2=0
    ENSIGHT3=0
    ENSIGHT4=0
    ENSIGHT5=0
    ENSIGHT6=0
    ENSIGHT7=0
    ENSIGHT8=0
    ENSIGHT9=0
    ENSIGHT10=0
    ENSIGHT11=0
    ENSIGHT12=0
    ENSIGHT13=0
    ENSIGHT14=0
    ENSIGHT15=0
    ENSIGHT16=0
    ENSIGHT17=0
    ENSIGHT18=0
    ENSIGHT19=0
    ENSIGHT20=0
    ENSIGHT21=0
    ENSIGHT22=0
    ENSIGHT23=0
    ENSIGHT24=0
    ENSIGHT25=0
    ENSIGHT26=0
    ENSIGHT27=0
    ENSIGHT28=0
    ENSIGHT29=0
    ENSIGHT30=0
    ENSIGHT31=0

    !MPI parallel variables
   
    XPAR=0
    XLOC=0
    XID=0
    YID=0
    YPAR=0
    YLOC=0
    IJCT_GLOBAL=0

    LWEST = 0
    LEAST = 0
    
    MPI_DRIFT_INIT = 0
    INT_GHOST=0
    GHOST_ZONE_CHECK=0

    ILTMSR_GL=0
    JLTMSR_GL=0
    NTSSSS_GL=0
    MTMSRP_GL=0
    MTMSRC_GL=0
    MTMSRA_GL=0
    MTMSRUE_GL=0
    MTMSRUT_GL=0
    MTMSRU_GL=0
    MTMSRQE_GL=0
    MTMSRQ_GL=0
    MLTM_GL=0
    ! DeepThunder coupling variables
    DTGRID_NT=0
    DTGRID_NX=0
    DTGRID_NY=0
    INIT_DT=0
    ! Data Assimilation variables
    VP_I=0
    VP_J=0

    IC_STRID=0
    JC_STRID=0
END
